\begin{verbatim}
> Index({@ a^(n1*i) : i in [1..2] @}, c^n1);
1
> Index({@ a^(n2*i) : i in [1..3] @}, c^n2);
2
> Index({@ a^(n3*i) : i in [1..5] @}, c^n3);
4
> Index({@ a^(n4*i) : i in [1..37] @}, c^n4);
29
> CRT([1,2,4,29],[2,3,5,37]);
29
\end{verbatim}
